home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 20 / Tiger_Disk_020_19xx_Tiger-Crew-Disk_de_Side_C.d64 / leonardo main (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  38KB  |  1,013 lines
  1. 0 poke808,230:print"[147]"chr$(8):if a=0 then a=1:print"[147]":load"leonardo font",8,1
  2. 1 if bi=4 then bi=5:poke53280,0:poke53281,0:print"[147][152]":load"leonardo font",8,1
  3. 2 if bi=5 then bi=4:poke56576,0:poke53272,33:poke648,200:goto 30
  4. 3 :
  5. 4 poke56576,0:poke53272,33:poke648,200:print"[152][147]"
  6. 5 le=35:r=1:w=13
  7. 6 poke53280,0:poke53281,0
  8. 7 i$="":x$="":p=0:z=0:m=20
  9. 8 goto 30
  10. 9 :
  11. 10 rem "[141][145] --- turbo input v2.0 ---
  12. 12 le[178]35:q[178]1:z[178]0:w[178]20:t[178]13:o[178]204:u[178]198:k[178]207:bs[178]1:
  13. 13 i$[178]"":x$[178]"":p[178]0
  14. 14 te$[178]">":[151] 214,[194](214)[170]1:[151] 211,2[171][195](te$)[171]1
  15. 15 [158] 58732
  16. 16 [153] te$;" ";:p[178]0:bs[178]1
  17. 17 [151]o,z:[151]u,z:[146]u,q:[161]x$:[151]k,z:[151]o,q:[153]" cmd";:[139]x$[178]"goto"[167]i$[178]"fspc(_":[142]
  18. 18 [139]p[177]z[167][139][198](x$)[178]w[167]i$[178][200](i$,[195](i$)[171]q):[153]"cmd cmd";:p[178]p[171]1
  19. 19 [139][198](x$)[178]t[137]23
  20. 20 [139]p[178]le[137]17
  21. 21 [139]bs[178]q[167][139](x$[179]" "[176](x$[177][199](127)))[167][139]x$[179][199](160)[137]17
  22. 22 [153]x$;:i$[178]i$[170]x$:p[178]p[170]q:[137]17
  23. 23 [153] [199](13)
  24. 24 [142]
  25. 25 :
  26. 30 [143] "gosubon --- bildverteiler ---
  27. 31 if bi=0 then 2000
  28. 32 if bi=1 then 2100
  29. 33 if bi=2 then 2200
  30. 34 if bi=3 then 2300
  31. 35 if bi=4 then 2400
  32. 36 if bi=5 then 2550
  33. 37 if bi=6 then 2600
  34. 38 if bi=7 then 2700
  35. 39 if bi=8 then 2800
  36. 40 if bi=9 then 2900
  37. 41 if bi=10then 3000
  38. 42 if bi=11then 3100
  39. 43 if bi=12then 3200
  40. 44 if bi=13then 3300
  41. 45 if bi=14then 3400
  42. 46 if bi=15then 3500
  43. 47 if bi=16then 3600
  44. 48 if bi=17then 3700
  45. 49 :
  46. 50 rem "[141][145] --- parser (ebene 1) ---
  47. 51 [139]v$[178]"toete"[176]v$[178]"kille"[167] 100
  48. 52 [139]v$[178]"inv"[176]v$[178]"inventar"[176]v$[178]"list"[176]v$[178]"liste"[167] 110
  49. 53 [139]v$[178]"untersuche"[176]v$[178]"untersuch"[167]880
  50. 54 [139]v$[178]"benutze"[176]v$[178]"use"[167] 130
  51. 55 [139]v$[178]"nimm"[176]v$[178]"nehme"[167] 150
  52. 56 [139]v$[178]"lies"[176]v$[178]"lese"[167] 180
  53. 57 [139]v$[178]"iss"[176]v$[178]"esse"[167] 200
  54. 58 [139]v$[178]"trinke"[176]v$[178]"trink"[167] 220
  55. 59 [139]v$[178]"klopfe"[176]v$[178]"klopf"[167] 240
  56. 60 [139]v$[178]"kommandos"[176]v$[178]"verben"[176]v$[178]"commands"[167] 260
  57. 61 [139]v$[178]"blick"[176]v$[178]"blicke"[167] 280
  58. 62 [139]v$[178]"gehe"[176]v$[178]"geh"[167] 300
  59. 63 [139]v$[178]"gib"[176]v$[178]"gebe"[167] 350
  60. 64 [139]v$[178]"schlaf"[176]v$[178]"schlafe"[167] 390
  61. 65 [139]v$[178]"frage"[176]v$[178]"frag"[167] 420
  62. 66 [139]v$[178]"grab"[176]v$[178]"grabe"[176]v$[178]"buddel"[176]v$[178]"dig"[167] 460
  63. 67 [139]v$[178]"sag"[176]v$[178]"sage"[176]v$[178]"sprich"[167] 480
  64. 68 [139]v$[178]"schlag"[176]v$[178]"schlage"[176]v$[178]"hit"[167] 510
  65. 69 [139]v$[178]"drueck"[176]v$[178]"druecke"[167] 530
  66. 70 [139]v$[178]"load"[176]v$[178]"lade"[167] 560
  67. 81 [139]v$[178]"save"[176]v$[178]"speichern"[176]v$[178]"sichern"[167] 590
  68. 82 [139]v$[178]"n"[176]v$[178]"(NULL)"[176]v$[178]"(NULL)orden"[176]v$[178]"norden"[167] 620
  69. 83 [139]v$[178]"s"[176]v$[178]"(NULL)"[176]v$[178]"(NULL)ueden"[176]v$[178]"sueden"[167] 670
  70. 84 [139]v$[178]"w"[176]v$[178]"(NULL)"[176]v$[178]"(NULL)esten"[176]v$[178]"westen"[167] 710
  71. 85 [139]v$[178]"o"[176]v$[178]"(NULL)"[176]v$[178]"(NULL)sten"[176]v$[178]"osten"[167] 760
  72. 86 [139]v$[178]"h"[176]v$[178]"left$"[176]v$[178]"left$och"[176]v$[178]"hoch"[167] 800
  73. 87 [139]v$[178]"r"[176]v$[178]"(NULL)"[176]v$[178]"(NULL)unter"[176]v$[178]"runter"[167] 840
  74. 88 [153]"print# right$ch kann deine valingabe nicht verstehen!":[153]"on (NULL)ersuche sie besser zu ";
  75. 89 [153]" formulieren.":[153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  76. 90 [143] "gosubon --- eingabe-trenner ---
  77. 91 for t=1 to len(i$):qw=0
  78. 92 if mid$(i$,t,1)=" " then 94
  79. 93 next t:o$="":v$="":qw=1
  80. 94 o$="":v$=left$(i$,t-1)
  81. 95 if qw=0 then o$=right$(i$,len(i$)-t)
  82. 96 return
  83. 99 :
  84. 100 rem "[208]arser -> toete"
  85. 108 print" [196]u kannst das nicht toeten!":poke198,0:wait198,1:poke198,0:return
  86. 109 :
  87. 110 rem "[141][145] --- parser -> inv, inventar ---
  88. 112 [153]" str$u besitzt:
  89. 113 if x1=1 then print" [159][212]ischtennisball"
  90. 114 if x2=1 then print" [159][210]ed [203]eycard[152]"
  91. 115 if x3=1 then print" [159]10-[208]fennig[152]"
  92. 116 if x4=1 then print" [159][193]mulett[152]"
  93. 117 if x5=1 then print" [159][208]haser[152]"
  94. 118 if x6=1 then print" [159]deine [214]erlobte[152]"
  95. 119 if x7=1 then print"
  96. 120 [139] x8[178]1 [167] [153]"
  97. 121 if x9=1 then print"
  98. 122 [139] xa[178]1 [167] [153]"
  99. 123 if xb=1 then print"
  100. 128 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  101. 129 :
  102. 130 [143] "gosubon --- parser -> benutze,use ---
  103. 131 if bi=15 and x4=1thenifo$="[193]mulett" or o$="amulett" then 1225
  104. 132 if bi=11 then if o$="[212]ransporter" or o$="transporter" then 1325
  105. 133 if o$="[193]mulett" or o$="amulett" then 1125
  106. 134 if o$="[208]haser" or o$="phaser" then 1200
  107. 135 if o$="[208]ing-[208]ong-[194]all" or o$="ping-pong-ball" then 1560
  108. 136 if o$="[212]ischtennisball" or o$="tischtennisball" then 1560
  109. 137 ifo$="[214]erlobte"oro$="verlobte"oro$="deine verlobte"then 1570
  110. 138 ifo$="deine [214]erlobte" then 1570
  111. 148 print" [196]u kannst das nicht benutzen!":poke198,0:wait198,1:poke198,0:return
  112. 149 :
  113. 150 rem "[141][145] --- parser -> nimm, nehme ---[146]
  114. 151 [139]bi[178]1[167][139]x1[178]0[167][139] o$[178]"ping-pong-ball" [176] o$[178]"tischtennisball" [167] 1000
  115. 152 [139]bi[178]1[167][139]x1[178]0[167][139] o$[178]"(NULL)ing-(NULL)ong-peekall" [176] o$[178]"(NULL)ischtennisball" [167] 1000
  116. 153 [139]bi[178]2[167][139]x2[178]0[167][139]o$[178]"red keycard"[176]o$[178]"(NULL)valstr$ (NULL)val(NULL)lenatn(NULL)str$"[167]1015
  117. 154 [139] bi[178]2 [167] [139] o$[178]"valrdbeere" [176] o$[178]"erdbeere" [176] o$[178]"erdbeeren" [167] 1095
  118. 155 [139] bi[178]2 [167] [139] o$[178]"valrdbeeren" [167] 1095
  119. 156 [139]bi[178]2[167][139]x2[178]0[167][139]o$[178]"(NULL)ed (NULL)eycard"[167]1015
  120. 157 [139]bi[178]14[167][139]x5[178]0[167][139]o$[178]"(NULL)haser" [176] o$[178]"phaser" [167] 1215
  121. 158 [139]bi[178]8 [167][139]o$[178]"(NULL)tein" [176] o$[178]"stein" [167] 1530
  122. 178 [153]" str$u kannst das nicht nehmen!":[151]198,0:[146]198,1:[151]198,0:[142]
  123. 179 :
  124. 180 [143] "gosubon --- parser -> lies, lese ---wait
  125. 181 if bi=4 then 1065
  126. 182 if bi=8 then 1100
  127. 198 print" [196]u kannst das nicht lesewait198,1:poke198,0:return
  128. 199 :
  129. 200 [143] "gosubon --- parser -> iss, esse ---wait
  130. 201 :
  131. 202 if bi=2 then if o$="[197]rdbeere" or o$="erdbeere" then 1095
  132. 203 if bi=2 then if o$="[197]rdbeeren" or o$="erdbeeren" then 1095
  133. 218 print" [196]u kannst das nicht essen!":poke198,0:wait198,1:poke198,0:return
  134. 219 :
  135. 220 rem "[141][145] --- parser -> trink, trinke ---[146]
  136. 238 [153]" str$u kannst das nicht trinken!":[151]198,0:[146]198,1:[151]198,0:[142]
  137. 239 :
  138. 240 [143] "gosubon --- parser -> klopf, klopfe ---wait
  139. 241 :
  140. 242 if bi=4 then 1085
  141. 243 if bi=8 thenifo$="[211]tein"oro$="stein" oro$="an [211]tein"oro$="an stein"then1115
  142. 244 if bi=6 then 1140
  143. 245 if bi=16 and o$="[211]chott" or o$="schott" or o$="tuer" or o$="[212]uer" then 1555
  144. 246 if bi=16thenifo$="[211]chott" or o$="schott" or o$="tuer" or o$="[212]uer" then 1555
  145. 258 print" [196]a kannst du nicht klopfen!":poke198,0:wait198,1:poke198,0:return
  146. 259 :
  147. 260 rem "[141][145] --- parser -> verben, kommandos ---[146]
  148. 261 [153]"print# ascolgende (NULL)erben kannst du in diesem
  149. 263 print" [193]dventure von [203]ultsoft benutzen:
  150. 264 [153]"list nimm, lies, iss, trinke, inventar,
  151. 265 print" klopfe, kommandos (verben), blick,
  152. 266 [153]" gehe, gib, schlafe, benutze, frage,
  153. 267 print" grabe, sage, schlage, druecke, unter-
  154. 268 [153]" suche, n, s, o, w, h, r, load, save...
  155. 270 print" und einige mehr.
  156. 271 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  157. 278 [142]
  158. 279 :
  159. 280 [143] "gosubon --- parser -> blick, blicke ---
  160. 290 print"[152] [196]u schaust und schaust und siehst
  161. 291 [153]" doch nicht mehr..."
  162. 292 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  163. 299 :
  164. 300 [143] "gosubon --- parser -> geh, gehe ---
  165. 340 print"[152] [196]u gehst und gehst (im [203]reis) und
  166. 342 [153]"closekommst doch nicht weiter..."
  167. 344 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  168. 349 :
  169. 350 [143] "gosubon --- parser -> gib, gebe ---
  170. 380 print"[152] [215]arum willst du das weggeben? [196]as
  171. 381 [153]" kannst du vielleicht noch brauchen!"
  172. 382 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  173. 389 :
  174. 390 [143] "gosubon --- parser -> schlaf, schlafe ---
  175. 415 print"[152] [196]u legst dich hin und schlaefst ein
  176. 416 [153]" paar (NULL)tuendchen...
  177. 418 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  178. 419 :
  179. 420 rem "[141][145] --- parser -> frag, frage ---
  180. 421 :
  181. 450 [153]"print# str$u fraegst und fraegst, doch niemand
  182. 452 print" antwortet dir...
  183. 454 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  184. 460 [143] "gosubon --- parser -> grab, grabe ---
  185. 461 :
  186. 462 if bi=2 then if x3=0 then 1035
  187. 463 if bi=2 then if x3=1 then 1050
  188. 477 print" [200]ier kannst du nicht graben!":print"<[212]aste>[152]":poke198,0:wait198,1:poke198,0
  189. 478 return
  190. 479 :
  191. 480 rem "[141][145] --- parser -> sag, sage ---
  192. 500 [153]"print# str$u schwaffelst und schwaffelst, doch
  193. 502 print" niemand hoert es...
  194. 504 [153]" print<(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  195. 509 :
  196. 510 [143] "gosubon --- parser -> schlag, schlage ---
  197. 520 print"[152] [196]u schlaegst um dich wie ein [215]ilder
  198. 522 [153]" doch niemand interssiert es...
  199. 524 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  200. 529 :
  201. 530 rem "[141][145] --- parser -> drueck, druecke ---
  202. 550 [153]"print# str$u drueckst und drueckst, doch nichts
  203. 552 print"[160]passiert...":print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  204. 559 :
  205. 560 rem "[141][145] --- parser -> load, lade ---
  206. 561 [153]"loadprint# (NULL)elchen (NULL)pielstand (1-9)?
  207. 562 get ty$:if ty$="" then 562
  208. 563 if ty$>"0"andty$<":" then 565
  209. 564 goto 562
  210. 565 print"[201]ch lade..."
  211. 566 er$="leonardo sav":er$=er$+ty$+",s,r"
  212. 567 open2,8,2,er$
  213. 568 input#2,bi:input#2,x1:input#2,x2:input#2,x3:input#2,x4:input#2,x5
  214. 569 input#2,x6:input#2,x7:input#2,x8:input#2,x9:input#2,xa:input#2,xb
  215. 570 rem input#2,xc:input#2,xd
  216. 580 close2
  217. 581 print"[158] [214]organg beendet!":print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0
  218. 582 return
  219. 589 :
  220. 590 rem "[141][145] --- parser -> save, sichern ---
  221. 591 [153]"loadprint# (NULL)elchen (NULL)pielstand (1-9)?
  222. 592 get ty$:if ty$="" then 592
  223. 593 if ty$>"0"andty$<":" then 595
  224. 594 goto 592
  225. 595 print"[201]ch sichere..."
  226. 596 er$="leonardo sav":er$=er$+ty$+",s,w":tr$="s:"+er$
  227. 597 open15,8,15,tr$:close15:open1,8,1,er$
  228. 598 print#1,bi:print#1,x1:print#1,x2:print#1,x3:print#1,x4:print#1,x5
  229. 599 print#1,x6:print#1,x7:print#1,x8:print#1,x9:print#1,xa:print#1,xb:close1
  230. 600 print"[158] [214]organg beendet!":print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0
  231. 602 return
  232. 619 :
  233. 620 rem "[141][145] --- parser -> n, [206]orden ---
  234. 621 :
  235. 622 [139] bi[178]2 [167] [153]"print# str$u gehst nach (NULL)orden.":[153]" <(NULL)aste>print#"
  236. 623 [139] bi[178]2 [167] [151]198,0:[146]198,1:[151]198,0:bi[178]1:[142]
  237. 624 [139] bi[178]5 [167] [153]"print# str$u gehst nach (NULL)orden.":[153]" <(NULL)aste>print#"
  238. 625 [139] bi[178]5 [167] [151]198,0:[146]198,1:[151]198,0:bi[178]2:[142]
  239. 626 [139] bi[178]6 [167] [153]"print# str$u gehst nach (NULL)orden.":[153]" <(NULL)aste>print#"
  240. 627 [139] bi[178]6 [167] [151]198,0:[146]198,1:[151]198,0:bi[178]5:[142]
  241. 628 [139] bi[178]7 [167] [153]"print# str$u gehst nach (NULL)orden.":[153]" <(NULL)aste>print#"
  242. 629 [139] bi[178]7 [167] [151]198,0:[146]198,1:[151]198,0:bi[178]6:[142]
  243. 630 [139] bi[178]12[167] [153]"print# str$u gehst nach (NULL)orden.":[153]" <(NULL)aste>print#"
  244. 631 [139] bi[178]12[167] [151]198,0:[146]198,1:[151]198,0:bi[178]13:[142]
  245. 632 [139] bi[178]16[167] [153]"print# str$u gehst nach (NULL)orden.":[153]" <(NULL)aste>print#"
  246. 633 [139] bi[178]16[167] [151]198,0:[146]198,1:[151]198,0:bi[178]12:[142]
  247. 667 [153]"print# str$u kannst nicht nach (NULL)orden gehen!":[153]" <(NULL)aste>print#":[151]198,0
  248. 668 [146]198,1:[151]198,0:[142]
  249. 669 :
  250. 670 [143] "gosubon --- parser -> s, (NULL)ueden ---
  251. 671 :
  252. 672 if bi=1 then print"[152] [196]u gehst nach [211]ueden."chr$(13)" <[212]aste>[152]"
  253. 673 if bi=1 then poke198,0:wait198,1:poke198,0:bi=2:return
  254. 674 if bi=2 then print"[152] [196]u gehst nach [211]ueden."chr$(13)" <[212]aste>[152]"
  255. 675 if bi=2 then poke198,0:wait198,1:poke198,0:bi=5:return
  256. 676 if bi=5 then print"[152] [196]u gehst nach [211]ueden."chr$(13)" <[212]aste>[152]"
  257. 677 if bi=5 then poke198,0:wait198,1:poke198,0:bi=6:return
  258. 678 if bi=6 then print"[152] [196]u gehst nach [211]ueden."chr$(13)" <[212]aste>[152]"
  259. 679 if bi=6 then poke198,0:wait198,1:poke198,0:bi=7:return
  260. 680 if bi=12 then print"[152] [196]u gehst nach [211]ueden."chr$(13)" <[212]aste>[152]"
  261. 681 if bi=12 then poke198,0:wait198,1:poke198,0:bi=16:return
  262. 682 if bi=13 then print"[152] [196]u gehst nach [211]ueden."chr$(13)" <[212]aste>[152]"
  263. 683 if bi=13 then poke198,0:wait198,1:poke198,0:bi=12:return
  264. 707 print"[152] [196]u kannst nicht nach [211]ueden gehen!":print" <[212]aste>":poke198,0:wait198,1
  265. 708 poke198,0:return
  266. 709 :
  267. 710 rem "[141][145] --- parser -> w, [215]esten ---
  268. 712 [139]bi[178]3[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  269. 713 [139]bi[178]4[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  270. 714 [139]bi[178]7[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  271. 715 [139] bi[178]3 [167] bi[178]2:[146]198,1:[151]198,0:[142]
  272. 716 [139] bi[178]4 [167] bi[178]3:[146]198,1:[151]198,0:[142]
  273. 717 [139] bi[178]7 [167] bi[178]9:[146]198,1:[151]198,0:[142]
  274. 718 [139]bi[178]8[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  275. 719 [139] bi[178]8 [167] bi[178]7:[146]198,1:[151]198,0:[142]
  276. 720 [139]bi[178]10[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  277. 721 [139] bi[178]10 [167] bi[178]8:[146]198,1:[151]198,0:[142]
  278. 722 [139]bi[178]13[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  279. 723 [139] bi[178]13 [167] bi[178]15:[146]198,1:[151]198,0:[142]
  280. 724 [139]bi[178]14[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  281. 725 [139] bi[178]14 [167] bi[178]13:[146]198,1:[151]198,0:[142]
  282. 726 [139]bi[178]12[167][153]"print# str$u gehst nach (NULL)esten.":[153]" <(NULL)aste>":[151]198,0
  283. 727 [139] bi[178]12 [167] bi[178]11:[146]198,1:[151]198,0:[142]
  284. 757 [153]"print# str$u kannst nicht nach (NULL)esten gehen!":[153]" <(NULL)aste>":[151]198,0:[146]198,1
  285. 758 [151]198,0:[142]
  286. 759 :
  287. 760 [143] "gosubon --- parser -> o, (NULL)sten ---
  288. 762 ifbi=3thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  289. 763 ifbi=2thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  290. 764 if bi=2 then bi=3:wait198,1:poke198,0:return
  291. 765 if bi=3 then bi=4:wait198,1:poke198,0:return
  292. 766 ifbi=9thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  293. 767 if bi=9 then bi=7:wait198,1:poke198,0:return
  294. 768 ifbi=7thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  295. 769 if bi=7 then bi=8:wait198,1:poke198,0:return
  296. 770 ifbi=8thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  297. 771 if bi=8 then bi=10:wait198,1:poke198,0:return
  298. 772 ifbi=11thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  299. 773 if bi=11then bi=12:wait198,1:poke198,0:return
  300. 774 ifbi=13thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  301. 775 if bi=13then bi=14:wait198,1:poke198,0:return
  302. 776 ifbi=15thenprint"[152] [196]u gehst nach [207]sten.":print" <[212]aste>":poke198,0
  303. 777 if bi=15then bi=13:wait198,1:poke198,0:return
  304. 797 print"[152] [196]u kannst nicht nach [207]sten gehen!":print" <[212]aste>":poke198,0:wait198,1
  305. 798 poke198,0:return
  306. 799 :
  307. 800 rem "[141][145] --- parser -> h, [200]och ---
  308. 801 :
  309. 802 [139] bi[178]4 [167] 1075
  310. 837 [153]"print# str$u kannst hier nicht hoch!":[153]" <(NULL)aste>":[151]198,0:[146]198,1
  311. 838 [151]198,0:[142]
  312. 839 :
  313. 840 [143] "gosubon --- parser -> r, (NULL)unter ---
  314. 877 print"[152] [196]u kannst hier nicht runter!":print" <[212]aste>":poke198,0:wait198,1
  315. 878 poke198,0:return
  316. 879 :
  317. 880 rem "[141][145] --- [208]arser -> untersuche ---
  318. 881 [139] x5[178]1 [167] [139] o$[178]"(NULL)haser" [176] o$[178]"phaser" [167] 1260
  319. 882 [139] x4[178]1 [167] [139] o$[178]"atnmulett" [176] o$[178]"amulett" [167] 1290
  320. 883 [139] x6[178]1 [167] [139] o$[178]"(NULL)erlobte" [176] o$[178]"verlobte" [176] o$[178]"deine (NULL)erlobte"[167]1470
  321. 884 [139] x1[178]1 [167] [139] o$[178]"(NULL)ischtennisball"[176]o$[178]"(NULL)ing-(NULL)ong-peekall" [167] 1430
  322. 885 [139] x2[178]1 [167] [139] o$[178]"(NULL)ed (NULL)eycard" [176] o$[178]"red keycard" [167] 1450
  323. 886 [139] x3[178]1 [167] [139] o$[178]"10-(NULL)fennig" [176] o$[178]"10-(NULL)fennig-(NULL)tueck" [167] 1440
  324. 887 [139] bi[178]14[167] [139] o$[178]"(NULL)haser" [176] o$[178]"phaser" [167] 1260
  325. 888 [139] bi[178]8 [167] [139] o$[178]"(NULL)tein" [176] o$[178]"stein" [167] 1520
  326. 906 [153]"print# str$as kannst du leider nicht untersuchen."
  327. 907 [153]"on <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  328. 908 :
  329. 998 :
  330. 999 [143] "gosubon ---> (NULL)arser valnde ! <---
  331. 1000 :
  332. 1001 x1=1
  333. 1002 print" [152][196]u hebst den kleinen [212]ischtennisball
  334. 1004 [153]" auf und betrachtest ihn, waehrend
  335. 1006 print" du in in deinen [198]ingern drehst.
  336. 1008 [153]" '(NULL)ow! valin (NULL)ier-(NULL)terne! (NULL)nd das hier
  337. 1010 print" auf dieser beschisse...schoenen,
  338. 1012 [153]" kleinen right$nsel.":[153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  339. 1013 [142]
  340. 1014 :
  341. 1015 :
  342. 1016 [153]"print# str$u nimmst dir freudestrahlend die
  343. 1018 print" [210]ed-[203]eycard und stopfst sie dir in
  344. 1020 [153]" deine unendlich grossen (NULL)aschen..."
  345. 1022 [153]" (NULL)it dieser (NULL)arte kannst du (NULL)(NULL)(NULL)val
  346. 1024 print" [212]ueren oeffnen, denkst du dir, ob es
  347. 1026 [153]" stimmt, kann ich dir jetzt nicht sagen.
  348. 1028 print"[145] -> [215]enn's dich interessiert, waehrend
  349. 1030 [153]" ich diesen (NULL)rampf hier schreibe,
  350. 1032 print" regnet es draussen wie bloed!
  351. 1034 x2[178]1:[153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  352. 1035 :
  353. 1036 [153]" print#(NULL)angsam graebst du dich tiefer und
  354. 1038 print" tiefer in das [197]rdreich hinein. [193]ls
  355. 1040 [153]" du am valnde deiner (NULL)raefte am valrdmittel-
  356. 1042 print"[145] punkt ankommst findest du ein 10-
  357. 1044 [153]" (NULL)fennig-(NULL)tueck!":x3[178]1
  358. 1046 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  359. 1050 :
  360. 1052 [153]" print#str$u graebst und graebst bis du irgend-
  361. 1054 print" wo in [193]sien rauskommst, in diesem
  362. 1056 [153]" atnugenblick durchzuckt dich der geniale
  363. 1058 print" [199]edanke [213][205][218][213][203][197][200][210][197][206], was du dann auch
  364. 1060 [153]" tust!":[153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  365. 1061 :
  366. 1065 [153]" print#str$u versuchst die alte (NULL)chrift zu
  367. 1066 print" entziffern, da du aber schon [208]robleme
  368. 1068 [153]" mit dem atnlphabet hast, ist dieser
  369. 1070 print" [214]ersuch nicht gerade von [197]rfolg ge-
  370. 1072 [153]" kroent.":[153]" <(NULL)aste>":[151]198,0:[146]198,1:[151]198,0:[142]
  371. 1073 :
  372. 1075 [153]"print# atnechzend kletterst du auf den atnltar,
  373. 1076 print" '[205]an hat hier oben aber eine schoene
  374. 1077 [153]" atnussicht' sagst du leise zu dir, man
  375. 1078 print" kann den [196]schungel sehen, den [197]rdbeer-
  376. 1079 [153]" acker und vieles mehr... str$a es dir
  377. 1080 print" jetzt zu langweilig dort oben wird,
  378. 1081 [153]" steigst du herunter und fragst dich,
  379. 1082 print" was dir das jetzt gebracht hat..."
  380. 1083 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  381. 1084 :
  382. 1085 print"[152] [196]u gehst an den steineren [193]ltar
  383. 1086 [153]" heran und klopfst hoeflich an...
  384. 1087 print" '[200]erein!' toent es aus dem [211]teingebilde
  385. 1088 [153]"on left$alt! (NULL)ar nur ein (NULL)cherz! str$u klopfst
  386. 1089 print" an dem [193]ltar... [197]s klingt wie massiver
  387. 1090 [153]" (NULL)tein. "
  388. 1091 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  389. 1092 :
  390. 1095 [153]"print# str$u bueckst dich und pflueckst eine
  391. 1096 print" handvoll [197]rdbeeren, da du jedoch zu
  392. 1097 [153]" gierig bist steckst du sie dir nicht
  393. 1098 print" in die [212]asche, sondern in den [205]und...
  394. 1099 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  395. 1100 [153]"print# str$u gehst ganz nahe an die (NULL)chrift-
  396. 1102 print" zeichen heran... [196]u kannst tatsaechlich
  397. 1104 [153]"on etwas erkennen! (left$aette ich nicht ge-
  398. 1106 print" dacht):
  399. 1108 [153]" (NULL)ang chr$ang... (NULL)lopf (NULL)tein... chr$rab bei
  400. 1110 print" [197]rdbe...
  401. 1112 [153]" str$as ist alles was du entziffern kannst.
  402. 1114 print"[145] <[212]aste>":poke198,0:wait198,1:poke198,0:return
  403. 1115 print"[152] [196]u klopfst an den grossen, fetten
  404. 1118 [153]" (NULL)tein und brichst dir beinahe die
  405. 1120 print" [200]and. [211]cheint wohl doch [199]ranit zu
  406. 1122 [153]" sein...
  407. 1124 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  408. 1125 print"[152] [196]u nimmst das [193]mulett in deine
  409. 1128 [153]" rechte left$and und streckst es gen'
  410. 1130 print" [200]immel... [206]ichts passiert... [211]cheint
  411. 1132 [153]" wohl kaputt zu sein, oder ich mach
  412. 1134 print" was falsch...
  413. 1136 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  414. 1140 [153]"loadprint# str$u faengst an auf der steinerenen
  415. 1142 print" [215]and herumzuklopfen, als du ploetzlich
  416. 1144 [153]" ein (NULL)ischen hoerst und ein (NULL)tueck der
  417. 1146 print" [215]and ploetzlich fehlt. [193]us dem [204]och
  418. 1148 [153]" dringt (NULL)icht, und da (NULL)icht (NULL)otten
  419. 1150 print" und andere [212]iere anzieht geht [204]eo
  420. 1152 [153]" in die (NULL)uer, die sich dann zum
  421. 1154 print" zweiten [205]al zischend bewegt, bloss
  422. 1156 [153]" diesmal zu.
  423. 1158 print" [206]un steht [204]eo in einem runden [210]aum,
  424. 1160 [153]" der irgendwie an einen (NULL)urbolift aus
  425. 1162 print" [210]aumschiff [197]delweiss erinnert (immer-
  426. 1164 [153]" noch keine (NULL)erbung!). (NULL)pontan sagt
  427. 1166 print" er '[194]ruecke' und der [204]ift setzt sich
  428. 1168 [153]" in peekewegung...
  429. 1171 print" <[212]aste>":poke198,0:wait198,1:poke198,0
  430. 1172 print"[147][152] [208]loetzlich oeffnet sich lautlos die
  431. 1173 [153]" (NULL)uer des (NULL)urboliftes und du kannst
  432. 1174 print" einen [212]ransporterraum sehen... [200]ey!
  433. 1175 [153]" left$alt mal ich wollte doch zur peekruecke!
  434. 1176 print" [215]ohl doch nicht ganz so wie in [210]aum-
  435. 1177 [153]" schiff valnterpreiss (nicht (NULL)reuss!)...
  436. 1178 print" '[215]ow! [197]chte [212]ransporter! [201]ch beam
  437. 1179 [153]" mich zum (NULL)ars!!!'
  438. 1180 print" [205]utig gehst du zum [211]chaltpult und
  439. 1181 [153]" tippst ne'n bischen darauf herum,
  440. 1182 print" dann stellst du dich hin wie [195]aptain
  441. 1183 [153]" (NULL)irk, (NULL)pock und (NULL)ille es immer machen,
  442. 1184 print" und rufst laut '[197][206][197][210][199][201][197]!'.
  443. 1185 [153]" str$u spuerst wie du entmaterialisierst...
  444. 1186 print"[145] <[212]aste>[152]":poke198,0:wait198,1:poke198,0:poke53265,peek(53265)and239
  445. 1187 sys 52509,"beam!",8:poke53265,peek(53265)or16
  446. 1188 sys52503:poke198,0:wait198,1:poke198,0:poke53265,peek(53265)and239
  447. 1189 sys52506:poke53280,0:poke53281,0
  448. 1190 sys 57812 ("leonardo font"),8,1:poke780,0:sys65493
  449. 1191 poke53272,33:poke56576,0:poke648,200:poke53265,peek(53265)or16
  450. 1192 bi=11:goto30
  451. 1200 if x5=1 then goto1203
  452. 1201 print"[152] [196]u besitzt keinen [208]haser!":print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0
  453. 1202 return
  454. 1203 print"[152] [196]u phaserst wild in der [199]egend rum,
  455. 1204 [153]" nach einer (NULL)iertelstunde peekeinahe-
  456. 1206 print" selbstmord hoerst du auf mit der
  457. 1208 [153]" unnuetzen peekallerei..."
  458. 1210 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  459. 1211 :
  460. 1215 [153]"print# str$u nimmst den (NULL)haser aus dem (NULL)egal"
  461. 1216 [153]" und steckst ihn dir in eine deiner":x5[178]1
  462. 1218 [153]" tausend (NULL)aschen..."
  463. 1220 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  464. 1222 [142]
  465. 1224 :
  466. 1225 [153]"print# str$u nimmst das atnmulett in deine
  467. 1226 print" [200]and und drueckst es langsam in die
  468. 1228 [153]" (NULL)ulde hinein, die dann  zu
  469. 1230 print" gluehen beginnt...
  470. 1232 [153]" (NULL)loetzlich bewegt sich die (NULL)uer und
  471. 1234 print" gibt den [215]eg frei in einen anderen
  472. 1236 [153]" (NULL)aum.
  473. 1237 if x6=1 then 1254
  474. 1238 print"[160][196]u schaust dich um und entdeckst deine
  475. 1240 [153]" (NULL)erlobte!!!":x6[178]1
  476. 1242 [153]" chr$efesselt sitzt sich auf einem (NULL)tuhl,
  477. 1244 print" eigentlich sass, denn in [215]indeseile
  478. 1246 [153]" ist sie befreit. (NULL)ach einem langen
  479. 1248 print" [194]egruessungskuss verlasst ihr den
  480. 1250 [153]" (NULL)aum ohne viel (NULL)orte zu verlieren.
  481. 1253 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  482. 1254 print" [202]edoch kannst du ausser einem [211]tuhl,
  483. 1256 [153]" an dem ein paar (NULL)eile haengen nichts
  484. 1258 print" erkennen...":goto 1253
  485. 1259 :
  486. 1260 print"[152] [196]u nimmst den [208]haser in deine [200]and
  487. 1262 [153]" und betrachtest ihn von allen (NULL)eiten.
  488. 1264 print" [197]r scheint ein etwas aelteres [205]odell
  489. 1266 [153]" zu sein, scheint aber trotzdem noch
  490. 1268 print" ganz gut zu funktionieren. [196]er [199]riff
  491. 1270 [153]" ist aus einem angenehm anzufassendem
  492. 1272 print" [203]unstoff, der [204]auf der [215]affe ist aus
  493. 1274 [153]" einem silbergrauen (NULL)etall, das du
  494. 1276 print" noch nie vorher gesehen hast.
  495. 1278 [153]" valigentlich sieht das str$ing ziemlich
  496. 1280 print" genau so aus, wie die [208]haser aus
  497. 1282 [153]" (NULL)aumschiff valnterprise (ich meine
  498. 1284 print" den [198]ilm).
  499. 1286 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  500. 1290 [153]"print# str$u nimmst das atnmulett in deine
  501. 1292 print" [200]aende und hebst es hoch. [211]chillernd
  502. 1294 [153]" bewegt es sich hin und her. str$u
  503. 1295 print" betrachtest es naeher:
  504. 1296 [153]" valin (NULL)ubinroter (NULL)tein sitzt in einer
  505. 1298 print" goldenen [198]assung, die wie zwei in-
  506. 1300 [153]" einanderverschlunge (NULL)eopaden geformt
  507. 1302 print" ist. [197]s haengt an einer groben, silbern
  508. 1304 [153]"on glaenzenden (NULL)ette. str$as atnmulett sieht
  509. 1306 print" aus wie frisch poliert, denn es
  510. 1308 [153]" glitzert und gleisst in allen ascarben
  511. 1310 print" des [211]pektrums.
  512. 1312 [153]" '(NULL)ozu mag es wohl dienen? (NULL)eshalb
  513. 1314 print" bekam ich das [212]eil bei der [218]usammen-
  514. 1316 [153]" kunft?' denkst du dir, auf die ascragen
  515. 1318 print" wirst du wohl so schnell keine [193]ntwort
  516. 1320 [153]" bekommen...
  517. 1322 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  518. 1324 :
  519. 1325 print"[152] [196]u stellst dich sammt deinem gesamten
  520. 1326 [153]" peekesitztum auf die (NULL)ransporterplatte
  521. 1328 print" und ruft wieder laut '[197]nergie!'.
  522. 1330 [153]" (NULL)ieder auf der right$nsel angekommen
  523. 1332 print" verlaesst du den geheimen [210]aum...
  524. 1333 [139] x6[178]0 [167] [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  525. 1334 [139] x6[178]0 [167] bi[178]6:[142]
  526. 1336 [153]"print# peekravo! str$u hast das atndventure gelosst!
  527. 1338 print" [205]it deiner [193]ngebeteten im [193]rm laufst
  528. 1349 [153]" du zum (NULL)andstrand und ihr setzt euch
  529. 1350 print" in das [194]oot......
  530. 1352 [153]" (NULL)ieder daheim angekommen wird erst-
  531. 1354 print" mal eine kleine [198]eier durchgezogen...
  532. 1356 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[153]"stopload"
  533. 1358 [158] 52509,"end-bild",8:[158]52503
  534. 1360 [151]198,0:[146]198,1:[151]198,0
  535. 1362 [158]52506
  536. 1400 [151]53280,0:[151]53281,0
  537. 1401 [158] 57812("leonardo font"),8,1:[151]780,0:[158]65493
  538. 1402 [151]56576,0:[151]53272,33:[151]e648,200
  539. 1403 [153]"loadprint# right$ch hoffe das (NULL)piel hat dir (NULL)pass
  540. 1404 print" gemacht!"
  541. 1406 print"[159] [195]redits
  542. 1408 [153]" list (NULL)rogramm........... sysstr$aniel left$immel
  543. 1410 print" [155] [199]rafik.............
  544. 1412 [153]" list right$m (NULL)piel+(NULL)itelbild. sysstr$aniel left$immel
  545. 1414 print" [155] [197]ndgrafik.......... [158][213]nbekannt....
  546. 1416 [153]" list (NULL)ound.............. sys(NULL)nbekannt....
  547. 1418 print" [155] [201]dee............... [158][196]aniel [200]immel
  548. 1420 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  549. 1422 [137] 1500
  550. 1430 [153]"print# str$u nimmst den (NULL)ischtennisball
  551. 1431 print" in deine [200]and und drehst ihn.
  552. 1432 [153]" valr besteht aus einem weissen (NULL)unst-
  553. 1433 print" stoff und ist von [211]childkroet...
  554. 1434 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  555. 1440 [153]"print# str$u nimmst das 10-(NULL)fennig-(NULL)tueck in
  556. 1442 print" deine [200]and und betrachtest es.
  557. 1444 [153]" vals stammt aus dem mid$ahr 1953 und sieht
  558. 1446 print" nicht mehr ganz neu aus...
  559. 1448 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  560. 1450 [153]"print# str$u nimmst die (NULL)ed-(NULL)eycard in deine
  561. 1452 print" [200]and und drehst es. [197]s sieht aus wie
  562. 1454 [153]" eine kleinere atnusgabe des (NULL)wiftlink
  563. 1456 print" der [198]irma [195][205][196] und glaenzt in einem
  564. 1458 [153]" satten (NULL)ot. valine (NULL)ermutung sagt dir,
  565. 1460 print" das du damit eine [210]ote [212]uer oeffnen
  566. 1461 [153]" kannst...
  567. 1462 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  568. 1470 print"[152] [196]u packst deine [214]erlobte aus und
  569. 1472 [153]" betrachtest sie dir von allen (NULL)eiten.
  570. 1474 print" [202]a, es ist deine [214]erlobte. [194]raunes
  571. 1476 [153]" left$aar, etwa 1.70 gross...
  572. 1478 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  573. 1500 print"[147][152] [196]och wozu ist die [210]ed [203]eycard?
  574. 1502 [139] x3[178]1 [167] [153]" str$as 10-(NULL)fennig-(NULL)tuek?"
  575. 1504 [139] x1[178]1 [167] [153]" str$er (NULL)ischtennisball?"
  576. 1506 [139] x5[178]1 [167] [153]" str$er (NULL)haser?"
  577. 1508 [153]"open str$iese ascragen werden (vielleicht)
  578. 1510 print" in [204]eonardo 2010 beantwortet werden...
  579. 1512 [153]"print# atnuf (NULL)iedersehen!"
  580. 1514 [128]
  581. 1520 [153]"print# str$u betrachtest den (NULL)tein von allen
  582. 1522 print" [211]eiten, kannst jedoch nichts besonderes
  583. 1523 [153]"on erkennen. str$ie (NULL)chrift steht auf der
  584. 1524 print" [214]orderseite des [194]rockens und wartet
  585. 1525 [153]" nur darauf, gelesen zu werden...
  586. 1526 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  587. 1530 print"[152] [196]u versuchst den [211]teinbrocken hoch-
  588. 1532 [153]" zuheben, wobei du dir beinahe einen
  589. 1534 print" [194]ruch hebst. [204]angsam sickert die
  590. 1536 [153]" valrkenntnis in dein hirn (left$irn habe
  591. 1538 print" ich absichtlich [203][204][197][201][206]geschrieben,
  592. 1540 [153]" da das bei (NULL)val(NULL) auch zutrifft!), das
  593. 1542 print" der [211]tein zu schwer sein koennte,
  594. 1544 [153]" und das auch drei (NULL)ypen mit deinen
  595. 1546 print" [205]uskeln (ha, ha!!!) den [211]tein nicht
  596. 1547 [153]" hochheben koennten. str$rum laesst du's
  597. 1548 print" sein...
  598. 1550 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  599. 1555 [153]"print# str$u haemmerst mit deiner ascaust auf dem
  600. 1556 print"[160][211]chott herum, erzeugst damit aber
  601. 1557 [153]" keine erkennbare (NULL)eaktion...
  602. 1558 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  603. 1560 print"[152] [196]u nimmst den [212]ischtennisball und
  604. 1562 [153]" wirfst ihn in die (NULL)uft, gekonnt faengst
  605. 1564 print"[145] du ihn dann wieder auf...
  606. 1566 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0:[142]
  607. 1570 [153]"print# str$u nimmst deine (NULL)erlobte und wirfst
  608. 1572 print" sie auf den [194]oden, danach faellst
  609. 1574 [153]" du ueber sie her und ... zensiert...
  610. 1576 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:return
  611. 1999 end
  612. 2000 print"[147][152] [212]odesmutig buchst du einen [198]lug
  613. 2002 [153]" zu einer right$nsel von der aus du zu
  614. 2004 print" 'deiner' einsamen, von mutierten
  615. 2006 [153]" atnliens besetzten right$nsel fahren kannst.
  616. 2008 print" [196]azu musst du dir eine [202]acht mieten,
  617. 2010 [153]" was du auch machst (peekoahh, ist der
  618. 2012 print" aber reich!, wirst du dir jetzt wohl
  619. 2014 [153]" denken... (NULL)timmt aber nicht, es ist
  620. 2016 print" eine [197]in-[205]ann-[202]acht mit dem [213]mwelt-
  621. 2018 [153]" freundlichen (NULL)uderbootantrieb, mit
  622. 2020 print" einer kraftvollen(?) [205][211]([205]enschen
  623. 2022 [153]" (NULL)taerke). atnusgestattet mit dem
  624. 2024 print" grosstmoeglichen [203]omfort: einen
  625. 2026 [153]" (NULL)ederueberzogenen (NULL)itzplatz, wasser-
  626. 2028 print" abweisend und atmungsaktiv!)
  627. 2030 [153]" (NULL)uegig ruderst du zu der right$nsel, die
  628. 2032 print" legiglich ca.33.97258 [203]ilometer ent-
  629. 2034 [153]" fernt ist...":[153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  630. 2036 [153]"on valine (NULL)tunde spaeter...
  631. 2037 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0
  632. 2038 print"[145][145] [218]wei [211]tunden spaeter...
  633. 2039 [151]198,0:[146]198,1:[151]198,0
  634. 2040 [153]"on (NULL)ier (NULL)tunden spaeter...
  635. 2041 poke198,0:wait198,1:poke198,0
  636. 2042 print"[145][152] [200]ey! [215]o bleibt der? [215]ir werden uns
  637. 2044 [153]" doch nicht nach einem neuen left$eld
  638. 2046 print" umsehen muessen?
  639. 2047 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  640. 2048 [153]"on (NULL)ier (NULL)tunden und drei komma fuenf
  641. 2050 print" [205]inuten spaeter...
  642. 2052 [153]" <(NULL)aste>onprint#":[151]198,0:[146]198,1:[151]198,0
  643. 2054 [153]"load (NULL)icht mehr ganz so todesmutig er-
  644. 2056 print" reicht [204]eonardo den weissen [211]andstrand
  645. 2058 [153]" und wirft sich halbtod auf ihn...
  646. 2060 print" [196]och als er heldenhafterweise an das
  647. 2062 [153]" (NULL)chicksal seiner (NULL)erlobten denkt,
  648. 2064 print" nennen wir sie mal [200]aickae, springt
  649. 2066 [153]" er auf und rennt wiedereinmal todes-
  650. 2068 print" mutig in den fast undurchdringlichen
  651. 2070 [153]" str$schungel...
  652. 2072 print" [214]orbei an [204]ianen, jeder [205]enge [193]ffen,
  653. 2074 [153]" exotisch aussehenden peekaeumen, extrem
  654. 2076 print" giftigen [211]chlangen, gierigen [204]eoparden
  655. 2078 [153]" ((NULL)ie passend! (NULL)val(NULL)-parden! left$a left$a left$a!!!)"
  656. 2080 [153]" und allerlei toedlichem chr$etier rennt
  657. 2082 print" unser [204]eo (nicht der von [205]ilka!)
  658. 2086 [153]" sysleft$inein ins atnbenteuer!"
  659. 2088 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  660. 2090 bi[178]1:[137] 30
  661. 2099 :
  662. 2100 [153]"loadprint# (NULL)un stehst du am (NULL)ande eines kleinen":bi[178]1
  663. 2102 [153]" asclugfeldes. (NULL)a toll!!! (NULL)an kann auch
  664. 2104 print" [200]ierher fliegen! [201]st ja ganz toll,
  665. 2106 [153]" das ich das auch mal erfahre!
  666. 2108 print" [202]edenfalls, wenn du nach [215]esten
  667. 2110 [153]" schaust, kannst du den winzigen
  668. 2112 print" [212]ower des [198]lugplatzes erkennen.
  669. 2114 [153]" left$ingehen kannst du jedoch nicht,
  670. 2116 print" da dieses [199]ebiet von einem gigantisch
  671. 2118 [153]" anmutendem (NULL)chutzschild umfasst ist.
  672. 2120 print" '[198]ast wie bei [195]aptain [203]irk auf dem
  673. 2122 [153]" (NULL)aumschiff valntenscheiss'(wir wollen
  674. 2124 print" hier ja keine [215]erbung fuer diverse
  675. 2126 [153]" (NULL)ciene-asciction-(NULL)erien machen...)
  676. 2127 print" <[212]aste>[152]":poke198,0:wait198,1:poke198,0:print"[147]"
  677. 2128 print" [201]m [211]ueden dieses wundervollen [208]latzes
  678. 2130 [153]" befindet sich ein atncker.(mid$a ein atncker!
  679. 2132 print" [208]asst das etwa nicht auf eine einsame
  680. 2134 [153]" (NULL)aribikinsel!?). (NULL)enn du eventuell,
  681. 2136 print" wirklich nur eventuell auf die geniale
  682. 2138 [153]" right$dee kommen solltest nach (NULL)orden oder
  683. 2140 print" sogar [207]sten gehen zu wollen, dann lass
  684. 2142 [153]" das lieber bleiben!
  685. 2144 if x1=0 then print" [193]ls dein wachsamer [194]lick auf den [194]oden
  686. 2146 [139] x1[178]0 [167] [153]" faellt sticht dir sofort ein chr$egenstand
  687. 2148 if x1=0 then print"[145] ins [193]uge ([193]utsch!) ein [208]ing-[208]ong-[194]all!"
  688. 2150 print" [158][215]as tust du nun?"
  689. 2152 gosub10:gosub90
  690. 2154 gosub50:goto 30
  691. 2199 :
  692. 2200 print"[147][152] [202]etzt stehst du auf einem [197]rdbeer-":bi=2
  693. 2202 print" acker. [197]rdbeeren soweit das blinde
  694. 2204 [153]" atnuge reicht! atnls du die valrdbeeren
  695. 2206 print" genauer anschaust kannst du dich des
  696. 2208 [153]" valindruckes nicht erwehren, das dich
  697. 2210 print" diese schmackhaften [197]rdbeeren irgend-
  698. 2212 [153]" wie anstarren. (str$ie (NULL)pace-(NULL)utants
  699. 2214 print" werden doch wohl keine [199]en-[197]xperimente
  700. 2216 [153]" durchgefuehrt haben?). (NULL)aehrend du
  701. 2218 print" ueber diese seltsamen [197]rdbeeren
  702. 2220 [153]" nachdenkst, nimmst du ploetzlich
  703. 2222 print" eine [194]ewegung aus dem [193]ugenwinkel
  704. 2224 [153]" wahr."
  705. 2226 [153]" <(NULL)aste>print#":[151]198,0:[146]198,1:[151]198,0
  706. 2228 [153]"loadprint# atnls du dich jedoch umdrehst entdeckst
  707. 2230 print" du nichts ungewoehnliches, ausser
  708. 2232 [153]" vielleicht, das die (NULL)flanzen ein
  709. 2234 print" kleines bischen naeher gerueckt sind?"
  710. 2236 print" '[197]gal!' denkst du dir und schaust auf
  711. 2238 [153]" den fruchtbaren, feuchten, vor kleinen
  712. 2240 print" [212]ieren wimmelnden [194]oden an und kannst
  713. 2242 [153]" jedoch ausser viel, viel str$reck nichts
  714. 2244 print" erkennen ([200]a, [200]a!). [196]u koenntest rein
  715. 2246 [153]" theorethisch gesehen in alle (NULL)ichtungen
  716. 2248 print"[145] weil ich es aber so will, kannst du
  717. 2250 [153]" nur nach (NULL)orden, (NULL)ueden und (NULL)sten
  718. 2252 if x2=0 then print" [193]m [194]oden liegt deutlich sichtbar eine
  719. 2254 [139] x2[178]0 [167] [153]" '(NULL)valstr$ (NULL)val(NULL)lenatn(NULL)str$' (kennst du str$(NULL)(NULL)(NULL) vom (NULL)len?
  720. 2256 if x2=0 then print" [215]enn du mal ein hundertfacher [205]assen-
  721. 2258 [139] x2[178]0 [167] [153]" moerder sein willst, dann ist dieses
  722. 2260 if x2=0 then print" wundervolle [205]etzel-game das richtige
  723. 2262 [139] x2[178]0 [167] [153]" fuer dich!)"
  724. 2263 [153]"sys (NULL)as willst du tun?"
  725. 2264 [141] 10:[141] 90
  726. 2266 [141] 50:[137]  30
  727. 2299 :
  728. 2300 [153]"loadprint# (NULL)un steht unser kleiner (NULL)eo auf einem":bi[178]3
  729. 2302 [153]" kleinem, ausgetretenem (NULL)rampelpfad,
  730. 2304 print" der mit sehr hoher [215]ahrscheinlichkeit
  731. 2306 [153]" von nicht gerade kleinen (NULL)ieren ge-
  732. 2308 print" schaffen wurde, um genau zu sein,
  733. 2310 [153]" diesen (NULL)ieren solltest du lieber nicht
  734. 2312 print" begegnen, denn dann waere dieses
  735. 2314 [153]" (hoffentlich) interessante atndventure
  736. 2316 print" sehr, sehr schnell zu [197]nde!). [213]m es
  737. 2318 [153]" noch deutlicher zu sagen: peekeeil dich!
  738. 2320 print" [196]u kannst nach [207]sten und [215]esten, wobei
  739. 2322 [153]" ich persoenlich auf keinen ascall nach
  740. 2324 print" [207]sten gehen wuerde (ich kann kein
  741. 2326 [153]" (NULL)ussisch!)...
  742. 2328 print"[158] [215]as willst du tun?
  743. 2330 [141]10:[141]90:[141]50:[137]30
  744. 2399 :
  745. 2400 bi[178]4:[139] x4[178]1 [167] 2535
  746. 2401 [153]"loadprint# (NULL)angsam betrittst du eine grosse,
  747. 2402 print" dunkle [204]ichtung. [201]n ihrer [205]itte befin-
  748. 2404 [153]" det sich ein (NULL)ockel, um ihn stehen
  749. 2406 print" sechs in lange, braune [203]utten ge-
  750. 2408 [153]" kleidete (NULL)ersonen. (NULL)ie bewegen ryth-
  751. 2410 print" misch ihre [193]rme zu einer [205]usik, die
  752. 2412 [153]" scheinbar aus dem str$schungel kommt...
  753. 2414 print" [197]ine der [208]ersonen dreht sich um und
  754. 2416 [153]" winkt dich zu ihm. (NULL)angsam und mehr
  755. 2418 print" oder weniger [213]nsicher gehst du auf
  756. 2420 [153]" die in eine (NULL)utte gekleidete (NULL)erson
  757. 2422 print" zu und versuchst ihr in das [199]esicht
  758. 2424 [153]" zu sehen, jedoch kannst du nichts er-
  759. 2426 print" kennen, da in der gesammten [204]ichtung
  760. 2428 [153]" eine seltsame str$aemmerung herrscht,
  761. 2430 print" die alle [203]onturen verwischt. [215]ort-
  762. 2432 [153]" los zeigt die (NULL)erson auf den atnltar,
  763. 2434 print" auf dem fremdartige [211]chriftzeichen
  764. 2436 [153]" eingeritzt sind. (NULL)angsam schreitest
  765. 2438 print" du den [215]eg, waehrenddessen beginnen
  766. 2440 [153]" die (NULL)uttentraeger zu singen, immer
  767. 2442 print" lauter mit jedem [211]chritt, den du
  768. 2444 [153]" machst. (NULL)oegernd bleibst du stehen
  769. 2446 print" und blickst nach oben. [196]ie [211]onne
  770. 2448 [153]" scheint wie vom left$immel gewischt, einonon
  771. 2450 poke198,0:wait198,1:poke198,0
  772. 2452 print"[147] dichter [206]ebel scheint ueber der
  773. 2454 [153]" (NULL)ichtung zu liegen, erst jetzt bemerkst
  774. 2456 print"[145] du die [198]ackeln, die zwischen den
  775. 2458 [153]" einzelnen (NULL)ersonen stehen und vom
  776. 2460 print" [215]ind hin- und herbewegt werden.
  777. 2462 [153]" str$er chr$esang der str$ruiden ist mittler-
  778. 2464 print" weile zu einem infernalischen [196]roehnen
  779. 2466 [153]" angeschwollen. (NULL)uckartig drehst du
  780. 2468 print" dich wieder zu dem [193]ltar und setzt
  781. 2470 [153]" einen ascuss vor den anderen, ohne das
  782. 2472 print" du auch nur mit einem [199]edanken daran
  783. 2474 [153]" denkst. atnuf der left$oechsten (NULL)telle des
  784. 2476 print" mit [210]unenschrift uebersaeten [193]ltars
  785. 2478 [153]" bleibst du stehen. (NULL)ieder drehst du
  786. 2480 print" dich um und betrachtest die [211]zene.
  787. 2482 [153]" str$er (NULL)ind ist mittleiweile zu einem
  788. 2484 print" [199]ewitter angeschwollen, [194]litze zucken
  789. 2486 [153]" aus dem dunklen left$immel, das fordernde
  790. 2488 print" [211]ingen der [196]ruiden nimmst du nur noch
  791. 2490 [153]" am (NULL)ande wahr, langsam streckst du
  792. 2492 print" deine [193]rme aus, du hoerst eine leise,
  793. 2494 [153]" fluesternde (NULL)timme, 'str$ie (NULL)usammenkunft
  794. 2496 print" erfolgt!' eindringlich brennen sich
  795. 2498 [153]" diese (NULL)orte in deinen chr$eist."
  796. 2500 [153]" <(NULL)aste>print#onon":[151]198,0:[146]198,1:[151]198,0
  797. 2502 [153]"load (NULL)loetzlich schlaegt ein einzelner,
  798. 2504 print" grell leuchtender [194]litz in deine
  799. 2506 [153]" ausgestreckten left$aende, die str$ruiden
  800. 2508 print" beenden ploetzlich ihren [199]esang, es
  801. 2510 [153]" wird totenstill, doch der peeklitz
  802. 2512 print" wabbert weiter an deinen [200]aenden.
  803. 2514 [153]" (NULL)loetzlich erlischt auch er und es
  804. 2516 print" wird dunkel, als du deine [200]aende be-
  805. 2518 [153]" wegst, spuerst du einen chr$egenstand
  806. 2520 print" in deiner [200]and, ein [193]mulett!
  807. 2522 [153]" (NULL)angsam wird es wieder hell, die":x4[178]1
  808. 2524 [153]" str$ruiden und die ascackeln sind ver-
  809. 2526 print" schwunden, die [204]ichtung liegt voellig
  810. 2528 [153]" verlassen vor dir.
  811. 2530 print" [196]u kannst nur nach [215]esten.":ifrt=0thenprint" <[212]aste)[152]":poke198,0:wait198,1:poke198,0
  812. 2531 print"[144][147]":if rt=0 then rt=1:sys52500,"power!",8:goto1
  813. 2532 print" [158][215]as willst du tun?"
  814. 2534 gosub 10:gosub 90:gosub50:goto 30
  815. 2535 print"[147][152] [206]un bist du an der [211]taette, an der die
  816. 2536 [153]" (NULL)usammenkunft stattfand! vals ist eine
  817. 2537 print" grosse [204]ichtung mit einem [211]teinaltar
  818. 2538 [153]" in der (NULL)itte, auf dem fremde (NULL)chrift-
  819. 2540 print" zeichen aufgetragen sind, sonst laeuft
  820. 2542 [153]" hier nichts ab. str$u kannst nur nach
  821. 2544 print" [215]esten.
  822. 2545 [153]"sys (NULL)as willst du tun?"
  823. 2546 [141]10:[141]90:[141]50:[137]30
  824. 2549 :
  825. 2550 [153]"loadprint# str$u stehst vor einer steil aufragenden
  826. 2552 print" [198]elswand, durch die lediglich ein
  827. 2554 [153]" duenner chr$ang gindurchfuehrt. str$u
  828. 2556 print" kannst nach [206]orden oder nach [211]ueden,
  829. 2558 [153]" in den engen chr$ang hinein...
  830. 2560 print" [158][215]as willst du tun?"
  831. 2562 gosub10:gosub90:gosub50:goto30
  832. 2599 :
  833. 2600 print"[147][152] [196]u stehst nun in der [205]itte eines
  834. 2602 [153]" langen chr$anges, der durch eine gewaltige
  835. 2604 print"[145] [198]elswand fuehrt. '[214]erdammt, wo hab
  836. 2606 [153]" ich bloss mein asceuerzeug?!' denkst
  837. 2608 print" du dir, da du eigentlich ziemlich
  838. 2610 [153]" wenig siehst, wenn man es so sieht
  839. 2612 print" (oder nicht sieht) dann siehst du
  840. 2614 [153]" nichts, rein gar nichts! right$st das
  841. 2616 print" nicht depremierend!? [196]a koennen die
  842. 2618 [153]" schoensten, groessten (NULL)chaetze hinter
  843. 2620 print" einer [199]eheimtuer lauern und man sieht
  844. 2622 [153]" sie nicht! str$as ist (NULL)ech...
  845. 2624 print" [196]u kannst nach [206]orden und [211]ueden.
  846. 2626 [153]" sys(NULL)as machst du jetzt?"
  847. 2628 [141]10:[141]90:[141]50:[137]30
  848. 2649 :
  849. 2700 [153]"loadprint# (NULL)un befindest du dich am (NULL)aldrand,
  850. 2701 print" oder doch wohl eher am [196]schungelrand."
  851. 2702 print" [200]ier waechst etwa knoechelhohes [199]rass
  852. 2704 [153]" und ein paar emsige right$nsekten huschen
  853. 2706 print" hin und her, das ganze [198]eld scheint
  854. 2708 [153]" zu bluehen, vor right$nsekten (right$git!) und
  855. 2710 print" vor [194]lumen ([193]hhh!). [215]enn du nach [207]sten
  856. 2712 [153]" schaust kannst du eine kleine (NULL)chlucht
  857. 2714 print" erkennen, im [215]esten sieht man nichts,
  858. 2716 [153]" was nicht umbedingt heissen soll, das
  859. 2718 print" dort nichts ist, da ist naemlich schon
  860. 2720 [153]" was, bloss was!?
  861. 2721 print" [196]u kannst nach [206]orden, [215]esten und [207]sten
  862. 2722 [153]"syson (NULL)as tust du nun?"
  863. 2724 [141]10:[141]90:[141]50:[137]30
  864. 2749 :
  865. 2800 [153]"loadprint# mid$etzt befindest du dich am (NULL)ande einer
  866. 2802 print" kleinen aber vor allem [212][201][197][198][197][206]! [211]chlucht
  867. 2804 [153]"on ((NULL)chluck!). str$u koenntest noch etwas
  868. 2806 print" nach [207]sten gehen, vielleicht lohnt
  869. 2808 [153]" es sich ja!? (NULL)eben dir steht oder
  870. 2810 print" besser liegt ein besonders fetter
  871. 2812 [153]" (NULL)teinbrocken, der left$immel weiss wo der
  872. 2814 print" herkommt. [193]ls du ihn naeher in [193]ugen-
  873. 2816 [153]" schein nimmst, faellt dir eine
  874. 2818 print" schwache, kraxelige [211]chrift auf...
  875. 2819 [153]" str$u kannst nach (NULL)esten und (NULL)sten.
  876. 2820 print"[158] [215]as nun, guter [205]ann (oder [198]rau)?
  877. 2822 [141]10:[141]90:[141]50:[137]30
  878. 2849 :
  879. 2900 bi[178]9:[153]"loadprint# mid$etzt bist du gerade in eine ascalle
  880. 2902 print" getappt, aus der du [206][201][197] mehr ent-
  881. 2904 [153]" kommen kannst! str$as (NULL)piel ist jetzt
  882. 2906 print" beendet! [196]ie [196]iskette wird uebrigens
  883. 2908 [153]" gerade geloescht.
  884. 2910 print" [193]lso [211]pass beiseite, du befindest dich
  885. 2912 [153]" an einem (NULL)rt, den noch kein (NULL)ensch
  886. 2914 print" zuvor betreten hatte! ([194]ist du ein
  887. 2916 [153]" (NULL)ensch?!)
  888. 2918 print" [200][197][217], warum glaubst du mir nicht? [196]as
  889. 2920 [153]" klingt doch ganz gut, oder etwa nicht?
  890. 2922 print" [207].[203]., du stehst in einer stinknormalen
  891. 2924 [153]" (NULL)ackgasse, die durch diesen schoenen
  892. 2926 print" [212]ext eigentlich gar nicht mehr stink-
  893. 2928 [153]" normal sein sollte...
  894. 2930 print" [196]er einzige [215]eg in [198]reiheit fuehrt
  895. 2932 [153]" nach (NULL)sten."
  896. 2934 [153]" sys(NULL)as machst du nun?"
  897. 2936 [141]10:[141]90:[141]50:[137]30
  898. 2949 :
  899. 3000 bi[178]10:[153]"loadprint# (NULL)ja, da war unser lieber,
  900. 3002 print" kleiner [204]eo wohl nicht vorsichtig
  901. 3004 [153]" genug, denn als du weiter an den
  902. 3006 print" [210]and der [211]chlucht gehen wolltest,
  903. 3008 [153]" loesste sich unter deinen ascuessen
  904. 3010 print" ein kleiner [211]tein von der [199]roesse
  905. 3012 [153]" des valmpire-(NULL)tate-peekuildings in den (NULL).(NULL).atn
  906. 3014 print"[145] unter deinen [198]uessen. [202]a, ja, der
  907. 3016 [153]" (NULL)aure (NULL)egen fuehrt schon zu so manchem
  908. 3018 print" [212]od... [196]as [211]teinchen reisst dich
  909. 3020 [153]" erbarmungslos mit in die (NULL)iefe, der
  910. 3022 print" einzige, der dich jetzt noch retten
  911. 3024 [153]" koennte, waere right$lenleft$, der (NULL)rogrammierer.
  912. 3026 print" [197]in einziger, simpler [199][207][212][207]-[194]efehl...
  913. 3028 [153]" (NULL)iele (NULL)eute sagen ja, ich waere
  914. 3030 print" [197][201][212][197][204], mich zu sehr in [211]zene setzte
  915. 3032 [153]" (vor allem in meinen (NULL)rogrammen!!!).
  916. 3034 print" [215]as meinst du dazu?
  917. 3036 [153]" sys(1) str$er (NULL)rogrammierer ist eitel
  918. 3038 print" (2) [196]er [208]rogrammierer ist [206][201][195][200][212] eitel
  919. 3040 [153]" open(NULL)riff deine (NULL)ahl!"
  920. 3045 [161]r$:[139] r$[178]"" [167] 3045
  921. 3046 [139] r$[178]"1" [167] 3050
  922. 3048 [139] r$[178]"2" [167] 3070
  923. 3049 [137] 3045
  924. 3050 [153]"loadprint# str$as war ascatn(NULL)(NULL)lenleft$!
  925. 3052 print" [215][193][211]?????? [201]ch bin eitel!? [215]as denkst
  926. 3054 [153]" du dir ???
  927. 3056 print" <[212]aste>[152]":poke198,0:wait198,1:pke198,0
  928. 3058 run
  929. 3070 print"[152][147][160][211]chleimen nuetzt dir auch nichts mehr!
  930. 3072 [153]" str$as wars!"
  931. 3074 [153]" <(NULL)aste>print#"
  932. 3076 [151]198,0:[146]198,1:[151]198,0:[138]
  933. 3100 [153]"loadprint# str$u remateralisierst in einem (NULL)aum,
  934. 3102 print" der dem [212]ransporter auf der [201]nsel fast
  935. 3104 [153]" auf das left$aar gleich. (NULL)ur liegt hier
  936. 3105 print" ein leichtes [194]rummen in der [204]uft.
  937. 3106 [153]" str$er (NULL)ransporter scheint immer noch
  938. 3107 print" funktionsbereit zu sein, das heisst,
  939. 3108 [153]" das du ihn jederzeit benutzen kannst.
  940. 3109 print" [197]s befinden sich keine [208]ersonen im
  941. 3110 [153]" (NULL)aum, str$u kannst nach (NULL)sten, auf den
  942. 3112 print" [199]ang hinaus."
  943. 3114 print"[158] [215]as tust du nun?"
  944. 3116 gosub10:gosub90:gosub50:goto30
  945. 3149 :
  946. 3200 print"[147][152] [206]un stehst du auf dem [199]ang der [213].[211].[211].
  947. 3202 [153]" valnterpr... (right$ch hasse (NULL)erbung!)
  948. 3204 print" [196]u kannst nach [206]orden und [211]ueden,
  949. 3206 [153]" an der chr$angwand sind regelmaessig
  950. 3208 print" [211]chotte eingelassen. [197]s zeigen sich
  951. 3210 [153]" keine (NULL)enschen, noch nicht mal (NULL)pace-
  952. 3212 print" [205]utants ([211]chade!). [201]m [206]orden kannst du
  953. 3214 [153]" eine weitere (NULL)erzweigung sehen, im
  954. 3216 print" [211]ueden befindet sich nur ein einzelnes,
  955. 3218 [153]"on ziemlich grosses (NULL)chott...
  956. 3220 print" [158][215]as nun grosser [200]eld?"
  957. 3222 gosub10:gosub90:gosub50:goto30
  958. 3249 :
  959. 3300 print"[147][152] [196]u stehst nun an einer klassischen
  960. 3302 [153]" (NULL)-(NULL)reuzung ((NULL)ernt man in der ascahr-
  961. 3304 print" schule!). [193]n der [215]and befinden sich
  962. 3306 [153]" grosse left$inweisschilder, die in valnglisch
  963. 3308 print"[145] verfasst sind: [215]est-??? <- heisst
  964. 3310 [153]" auf deutsch (NULL)nast, chr$efaengnis,
  965. 3312 print" [203]itchen (nicht [203]ueche!!!), [197]ast-???
  966. 3314 [153]" (str$as heisst auf deutsch (NULL)agerraum!)...
  967. 3316 print" [197]ntschuldigt meine schlechten [197]nglisch-
  968. 3318 [153]"on (NULL)enntnisse, aber ich habe gerade
  969. 3320 print" [198]erien, da funktioniert halt nicht
  970. 3322 [153]" immer so wie man's will...
  971. 3324 print" [194]evor ich etwas vergesse, nach
  972. 3326 [153]" (NULL)ueden kann man auch noch.
  973. 3328 print"[158] [215]as du tun nun? ([199]ut-[196]eutsch!)
  974. 3330 [141]10:[141]90:[141]50:[137]30
  975. 3349 :
  976. 3400 [153]"loadprint# (NULL)un stehst du in einem kleinen
  977. 3402 print" [204]agerraum, in dem vier, etwa sechs
  978. 3404 [153]" (NULL)eter lange (NULL)egale stehen. str$ie (NULL)egale
  979. 3406 print" sind vollbeladen mit allerhand [218]eug.
  980. 3408 [139] x5[178]0 [167] [153]" (NULL)ie zum peekeispiel einem kleinen,
  981. 3410 if x5=0 then print" handlichen [208]haser."
  982. 3412 print" [193]nsonsten ist dieser [210]aum eine [211]ack-
  983. 3414 [153]" gasse, das heisst, das du nur nach
  984. 3416 print" [215]esten gehen kannst.
  985. 3418 [153]"sys (NULL)as tust du nun?
  986. 3420 gosub10:gosub90:gosub50:goto30
  987. 3449 :
  988. 3500 print"[147][152] [206]un stehst du vor einer metalenen
  989. 3502 [153]" (NULL)uer, in die ein kleines (NULL)ichtfenster
  990. 3504 print" eingelassen ist, durch das man aber
  991. 3506 [153]" nichts erkennen kann. str$ort, wo bei
  992. 3508 print" einer auf der [197]rde ueblichen [212]uer die
  993. 3510 [153]" (NULL)linge waere, befindet sich hier eine
  994. 3512 print" kleine [205]ulde, die in etwa an die
  995. 3514 [153]" ascorm eines atnmuletts erinnert...
  996. 3516 print" [193]nsonsten ist die [212]uer voellg glatt
  997. 3518 [153]" und besitzt keine ascugen.
  998. 3520 print" [196]u kannst nach [207]sten.
  999. 3522 [153]"sys (NULL)as nun?"
  1000. 3524 [141]10:[141]90:[141]50:[137]30
  1001. 3549 :
  1002. 3600 [153]"loadprint# str$u stehst vor einem grossem, quardrat-
  1003. 3601 print" ischen [211]chott. [193]uf ihm steht in
  1004. 3602 [153]" grossen, schwarzen peekuchstaben '(NULL)urbo-
  1005. 3604 print" lift'. [196]u siehst aber keine [205]oeglich-
  1006. 3606 [153]" keit, das (NULL)chott zu oeffnen, da
  1007. 3608 print" es voellig glatt ist und keine [210]iefen
  1008. 3610 [153]" aufweisst.
  1009. 3612 print" [196]u kannst nach [206]orden.
  1010. 3614 [153]"sys (NULL)as tust du nun?"
  1011. 3616 [141]10:[141]90:[141]50:[137]30
  1012. 3649 :
  1013.